Voorbeeld van de methode GetSelection

Het volgende voorbeeld geeft de posities van de begin- en eindpunten van de huidige selectie in CodePanes(1). De laatste regel in het voorbeeld maakt gebruik van de methode GetSelection om de vier waarden in de vier variabelen te plaatsen.

Dim m As Long
Dim n As Long
Dim x As Long
Dim y As Long
Application.VBE.CodePanes(1).GetSelection m, n, x, y